;------------------------------------------------------------
;
; Events file for Kyokujitsu
;
; By: DarthVeda
; June 3, 2002
; Last Change: Version .9b
; Events for March 1940 - June 1940
; Copyright (C) 2000, 2001, 2002
;
;------------------------------------------------------------

;------------------------------------------------------------
; Flags Used
;
; The following flags have been used.
;
; ***Red Army***
; - Cease-Fire Active - Flag Tech 25 (93)
; ***Chinese***
; 0 - Objective
; 1 - Wuhan Surprise already tripped
; - Nanking Captured Early - Flag Tech 1 (33)
; - Communist Base - Flag Tech 2 (36)
; - Southern Offensive - Flag Tech 4 (40)
; - Wuhan Surprise - Flag Tech 5 (41)
; ***IJA***
; 1 - Got Fuel?
; - Defeat Russia #2 - Flag Tech 3 (39)
; - Defeat Russia #1 - Flag Tech 2 (36)
; - Built IJA Conscriptor = Flag Tech 1 (33)
; ***IJN***
; 0 - Conscriptor Bonus for Army/Navy
; - Built IJN Conscriptor - Flag Tech 1 (33) 
;
;------------------------------------------------------------

@BEGINEVENTS

; @DEBUG

@INITFLAG

;------------------------------------------------------------
;
; Flag Events
;
; Flag managing events.
;
;------------------------------------------------------------

@IF
ScenarioLoaded
@AND
ReceivedTechnology
receiver=Chinese
technology=41
@THEN
Flag
Continuous
who=Chinese
state=On
flag=1
@ENDIF

;------------------------------------------------------------
;
; Negotiations Event
;
; Prevent the cowardly AI's from making peace and what not
;
;------------------------------------------------------------

@IF
Negotiation
talker=Anybody
talkertype=HumanOrComputer
listener=Anybody
listenertype=HumanOrComputer
@THEN
@ENDIF

@IF
Turn
turn=Every
@THEN
MakeAgression
who=Chinese
whom=IJA
@ENDIF

@IF
Turn
turn=Every
@THEN
MakeAgression
who=Chinese
whom=IJN
@ENDIF

; No attacking the Allies!

@IF
UnitKilled
unit=AnyUnit
attacker=IJA
Defender Only
defender=Allies
@THEN
Text
^ Your premature attack on the United States is unacceptable.
YOU HAVE BEEN RELIEVED.
endtext
DestroyACivilization
whom=IJA
@ENDIF

@IF
UnitKilled
unit=AnyUnit
attacker=IJN
Defender Only
defender=Allies
@THEN
Text
^ Your premature attack on the United States is unacceptable.
YOU HAVE BEEN RELIEVED.
endtext
DestroyACivilization
whom=IJN
@ENDIF

;------------------------------------------------------------
;
; Japanese Requesition Events
;
; The following events will allow the Japanese player to
; acquire additional units
;
;------------------------------------------------------------

;Begin IJA Infantry

@IF
ReceivedTechnology
receiver=IJA
technology=51
@THEN
CreateUnit
owner=IJA
unit=Nipponese
Count=3
veteran=No
homecity=Tokyo
locations
78,80,1
endlocations
@ENDIF

@IF
ReceivedTechnology
receiver=IJA
technology=50
@THEN
CreateUnit
owner=IJA
unit=Nipponese
Count=3
veteran=No
homecity=Tokyo
locations
78,80,1
endlocations
@ENDIF

@IF
ReceivedTechnology
receiver=IJA
technology=49
@THEN
CreateUnit
owner=IJA
unit=Nipponese
Count=2
veteran=No
homecity=Tokyo
locations
78,80,1
endlocations
@ENDIF

@IF
ReceivedTechnology
receiver=IJA
technology=48
@THEN
CreateUnit
owner=IJA
unit=Nipponese
veteran=No
homecity=Tokyo
locations
78,80,1
endlocations
@ENDIF

@IF
ReceivedTechnology
receiver=IJA
technology=51
@THEN
ChangeMoney
receiver=IJA
amount=-45
TakeTechnology
whom=IJA
technology=51
@ENDIF

@IF
ReceivedTechnology
receiver=IJA
technology=50
@THEN
ChangeMoney
receiver=IJA
amount=-45
TakeTechnology
whom=IJA
technology=50
@ENDIF

@IF
ReceivedTechnology
receiver=IJA
technology=49
@THEN
ChangeMoney
receiver=IJA
amount=-45
TakeTechnology
whom=IJA
technology=49
@ENDIF

@IF
ReceivedTechnology
receiver=IJA
technology=48
@THEN
ChangeMoney
receiver=IJA
amount=-45
TakeTechnology
whom=IJA
technology=48
@ENDIF

; end of IJA Infantry
; Begin IJA Fighters
 
@IF
ReceivedTechnology
receiver=IJA
technology=58
@THEN
CreateUnit
owner=IJA
unit=Ki-27 Nate
veteran=No
homecity=Tokyo
locations
78,80,1
endlocations
@ENDIF

@IF
ReceivedTechnology
receiver=IJA
technology=52
@THEN
CreateUnit
owner=IJA
unit=Ki-27 Nate
veteran=No
homecity=Tokyo
locations
78,80,1
endlocations
@ENDIF

@IF
ReceivedTechnology
receiver=IJA
technology=52
@THEN
ChangeMoney
receiver=IJA
amount=-80
TakeTechnology
whom=IJA
technology=52
@ENDIF

@IF
ReceivedTechnology
receiver=IJA
technology=58
@THEN
ChangeMoney
receiver=IJA
amount=-80
TakeTechnology
whom=IJA
technology=58
@ENDIF

; end IJA fighters
; Begin IJA Ground Equipment

@IF
ReceivedTechnology
receiver=IJA
technology=62
@THEN
CreateUnit
owner=IJA
unit=Artillery
veteran=No
homecity=Tokyo
locations
78,80,1
endlocations
@ENDIF

@IF
ReceivedTechnology
receiver=IJA
technology=62
@THEN
CreateUnit
owner=IJA
unit=Armored Infantry
veteran=No
homecity=Tokyo
locations
78,80,1
endlocations
@ENDIF

@IF
ReceivedTechnology
receiver=IJA
technology=61
@THEN
CreateUnit
owner=IJA
unit=Artillery
veteran=No
homecity=Tokyo
locations
78,80,1
endlocations
@ENDIF

@IF
ReceivedTechnology
receiver=IJA
technology=61
@THEN
CreateUnit
owner=IJA
unit=Armored Infantry
veteran=No
homecity=Tokyo
locations
78,80,1
endlocations
@ENDIF

@IF
ReceivedTechnology
receiver=IJA
technology=61
@THEN
ChangeMoney
receiver=IJA
amount=-65
TakeTechnology
whom=IJA
technology=61
@ENDIF

@IF
ReceivedTechnology
receiver=IJA
technology=62
@THEN
ChangeMoney
receiver=IJA
amount=-65
TakeTechnology
whom=IJA
technology=62
@ENDIF

; end IJA ground equipment
; Begin IJA Armored 

@IF
ReceivedTechnology
receiver=IJA
technology=85
@THEN
CreateUnit
owner=IJA
unit=Armored Warfare
veteran=No
homecity=Tokyo
locations
78,80,1
endlocations
@ENDIF

@IF
ReceivedTechnology
receiver=IJA
technology=85
@THEN
ChangeMoney
receiver=IJA
amount=-65
TakeTechnology
whom=IJA
technology=85
@ENDIF

; end IJA Armored
; Begin IJA Bombers

@IF
ReceivedTechnology
receiver=IJA
technology=63
@THEN
CreateUnit
owner=IJA
unit=Ki-21 Sally
veteran=No
homecity=Tokyo
locations
78,80,1
endlocations
@ENDIF

@IF
ReceivedTechnology
receiver=IJA
technology=64
@THEN
CreateUnit
owner=IJA
unit=Ki-21 Sally
veteran=No
homecity=Tokyo
locations
78,80,1
endlocations
@ENDIF

@IF
ReceivedTechnology
receiver=IJA
technology=63
@THEN
ChangeMoney
receiver=IJA
amount=-120
TakeTechnology
whom=IJA
technology=63
@ENDIF

@IF
ReceivedTechnology
receiver=IJA
technology=64
@THEN
ChangeMoney
receiver=IJA
amount=-120
TakeTechnology
whom=IJA
technology=64
@ENDIF

; end IJA Bombers
; Begin IJA Attack Aircraft

@IF
ReceivedTechnology
receiver=IJA
technology=65
@THEN
CreateUnit
owner=IJA
unit=Ki-30 Ann
veteran=No
homecity=Tokyo
locations
78,80,1
endlocations
@ENDIF

@IF
ReceivedTechnology
receiver=IJA
technology=68
@THEN
CreateUnit
owner=IJA
unit=Ki-30 Ann
veteran=No
homecity=Tokyo
locations
78,80,1
endlocations
@ENDIF

@IF
ReceivedTechnology
receiver=IJA
technology=65
@THEN
ChangeMoney
receiver=IJA
amount=-100
TakeTechnology
whom=IJA
technology=65
@ENDIF

@IF
ReceivedTechnology
receiver=IJA
technology=68
@THEN
ChangeMoney
receiver=IJA
amount=-100
TakeTechnology
whom=IJA
technology=68
@ENDIF

; end of IJN Attack Aircraft
; Being IJA Transports

@IF
ReceivedTechnology
receiver=IJA
technology=99
@THEN
CreateUnit
owner=IJA
unit=Transport
veteran=No
homecity=Tokyo
locations
78,80,1
endlocations
@ENDIF

@IF
ReceivedTechnology
receiver=IJA
technology=98
@THEN
CreateUnit
owner=IJA
unit=Transport
veteran=No
homecity=Tokyo
locations
78,80,1
endlocations
@ENDIF

@IF
ReceivedTechnology
receiver=IJA
technology=99
@THEN
ChangeMoney
receiver=IJA
amount=-80
TakeTechnology
whom=IJA
technology=99
@ENDIF

@IF
ReceivedTechnology
receiver=IJA
technology=98
@THEN
ChangeMoney
receiver=IJA
amount=-80
TakeTechnology
whom=IJA
technology=98
@ENDIF

; end of IJA Transports
; Begin IJN Infantry

@IF
ReceivedTechnology
receiver=IJN
technology=51
@THEN
CreateUnit
owner=IJN
unit=Marines
Count=2
veteran=No
homecity=Hiroshima
locations
57,71,1
endlocations
@ENDIF

@IF
ReceivedTechnology
receiver=IJN
technology=50
@THEN
CreateUnit
owner=IJN
unit=Marines
Count=2
veteran=No
homecity=Hiroshima
locations
57,71,1
endlocations
@ENDIF

@IF
ReceivedTechnology
receiver=IJN
technology=49
@THEN
CreateUnit
owner=IJN
unit=Marines
veteran=No
homecity=Hiroshima
locations
57,71,1
endlocations
@ENDIF

@IF
ReceivedTechnology
receiver=IJN
technology=48
@THEN
CreateUnit
owner=IJN
unit=Marines
veteran=No
homecity=Hiroshima
locations
57,71,1
endlocations
@ENDIF

@IF
ReceivedTechnology
receiver=IJN
technology=51
@THEN
ChangeMoney
receiver=IJN
amount=-45
TakeTechnology
whom=IJN
technology=51
@ENDIF

@IF
ReceivedTechnology
receiver=IJN
technology=50
@THEN
ChangeMoney
receiver=IJN
amount=-45
TakeTechnology
whom=IJN
technology=50
@ENDIF

@IF
ReceivedTechnology
receiver=IJN
technology=49
@THEN
ChangeMoney
receiver=IJN
amount=-45
TakeTechnology
whom=IJN
technology=49
@ENDIF

@IF
ReceivedTechnology
receiver=IJN
technology=48
@THEN
ChangeMoney
receiver=IJN
amount=-45
TakeTechnology
whom=IJN
technology=48
@ENDIF

; end IJN Infantry
; Begin IJN Fighter

@IF
ReceivedTechnology
receiver=IJN
technology=58
@THEN
CreateUnit
owner=IJN
unit=A5M Claude
veteran=No
homecity=Hiroshima
locations
57,71,1
endlocations
@ENDIF

@IF
ReceivedTechnology
receiver=IJN
technology=52
@THEN
CreateUnit
owner=IJN
unit=A5M Claude
veteran=No
homecity=Hiroshima
locations
57,71,1
endlocations
@ENDIF

@IF
ReceivedTechnology
receiver=IJN
technology=58
@THEN
ChangeMoney
receiver=IJN
amount=-80
TakeTechnology
whom=IJN
technology=58
@ENDIF

@IF
ReceivedTechnology
receiver=IJN
technology=52
@THEN
ChangeMoney
receiver=IJN
amount=-80
TakeTechnology
whom=IJN
technology=52
@ENDIF

; end IJN Fighter
; Begin IJN Ground Equipment

@IF
ReceivedTechnology
receiver=IJN
technology=62
@THEN
CreateUnit
owner=IJN
unit=Artillery
veteran=No
homecity=Hiroshima
locations
57,71,1
endlocations
@ENDIF

@IF
ReceivedTechnology
receiver=IJN
technology=61
@THEN
CreateUnit
owner=IJN
unit=Artillery
veteran=No
homecity=Hiroshima
locations
57,71,1
endlocations
@ENDIF

@IF
ReceivedTechnology
receiver=IJN
technology=62
@THEN
ChangeMoney
receiver=IJN
amount=-65
TakeTechnology
whom=IJN
technology=62
@ENDIF

@IF
ReceivedTechnology
receiver=IJN
technology=62
@THEN
ChangeMoney
receiver=IJN
amount=-65
TakeTechnology
whom=IJN
technology=62
@ENDIF

; end IJN Ground Equipment
; begin IJN Bomber

@IF
ReceivedTechnology
receiver=IJN
technology=63
@THEN
CreateUnit
owner=IJN
unit=G3M3 Nell
veteran=No
homecity=Hiroshima
locations
57,71,1
endlocations
@ENDIF

@IF
ReceivedTechnology
receiver=IJN
technology=64
@THEN
CreateUnit
owner=IJN
unit=G3M3 Nell
veteran=No
homecity=Hiroshima
locations
57,71,1
endlocations
@ENDIF

@IF
ReceivedTechnology
receiver=IJN
technology=63
@THEN
ChangeMoney
receiver=IJN
amount=-120
TakeTechnology
whom=IJN
technology=63
@ENDIF

@IF
ReceivedTechnology
receiver=IJN
technology=64
@THEN
ChangeMoney
receiver=IJN
amount=-120
TakeTechnology
whom=IJN
technology=64
@ENDIF

; end of IJN Bombers
; Begin IJN IJN Attack Aircraft

@IF
ReceivedTechnology
receiver=IJN
technology=65
@THEN
CreateUnit
owner=IJN
unit=D1A2 Susie
veteran=No
homecity=Hiroshima
locations
57,71,1
endlocations
@ENDIF

@IF
ReceivedTechnology
receiver=IJN
technology=68
@THEN
CreateUnit
owner=IJN
unit=B5N2 Kate
veteran=No
homecity=Hiroshima
locations
57,71,1
endlocations
@ENDIF

@IF
ReceivedTechnology
receiver=IJN
technology=65
@THEN
ChangeMoney
receiver=IJN
amount=-100
TakeTechnology
whom=IJN
technology=65
@ENDIF

@IF
ReceivedTechnology
receiver=IJN
technology=68
@THEN
ChangeMoney
receiver=IJN
amount=-100
TakeTechnology
whom=IJN
technology=68
@ENDIF

; end of IJN Attack Aircraft
; Begin IJN Transports

@IF
ReceivedTechnology
receiver=IJN
technology=99
@THEN
CreateUnit
owner=IJN
unit=Transport
Count=2
veteran=No
homecity=Hiroshima
locations
57,71,1
endlocations
@ENDIF

@IF
ReceivedTechnology
receiver=IJN
technology=98
@THEN
CreateUnit
owner=IJN
unit=Transport
Count=2
veteran=No
homecity=Hiroshima
locations
57,71,1
endlocations
@ENDIF

@IF
ReceivedTechnology
receiver=IJN
technology=99
@THEN
ChangeMoney
receiver=IJN
amount=-80
TakeTechnology
whom=IJN
technology=99
@ENDIF

@IF
ReceivedTechnology
receiver=IJN
technology=98
@THEN
ChangeMoney
receiver=IJN
amount=-80
TakeTechnology
whom=IJN
technology=98
@ENDIF

; end IJN Transports
; Begin IJN Submarines

@IF
ReceivedTechnology
receiver=IJN
technology=88
@THEN
CreateUnit
owner=IJN
unit=C-1 Sub
veteran=No
homecity=Hiroshima
locations
57,71,1
endlocations
@ENDIF

@IF
ReceivedTechnology
receiver=IJN
technology=88
@THEN
ChangeMoney
receiver=IJN
amount=-180
TakeTechnology
whom=IJN
technology=88
@ENDIF

; end IJN Submarines
; Begin IJN Light Cruisers

@IF
ReceivedTechnology
receiver=IJN
technology=90
@THEN
CreateUnit
owner=IJN
unit=Light Cruiser
veteran=No
homecity=Hiroshima
locations
57,71,1
endlocations
@ENDIF

@IF
ReceivedTechnology
receiver=IJN
technology=91
@THEN
CreateUnit
owner=IJN
unit=Light Cruiser
veteran=No
homecity=Hiroshima
locations
57,71,1
endlocations
@ENDIF

@IF
ReceivedTechnology
receiver=IJN
technology=90
@THEN
ChangeMoney
receiver=IJN
amount=-320
TakeTechnology
whom=IJN
technology=90
@ENDIF

@IF
ReceivedTechnology
receiver=IJN
technology=91
@THEN
ChangeMoney
receiver=IJN
amount=-320
TakeTechnology
whom=IJN
technology=91
@ENDIF

; end of IJN Light Cruisers
; begin IJN Destroyers

@IF
ReceivedTechnology
receiver=IJN
technology=94
@THEN
CreateUnit
owner=IJN
unit=Destroyer
veteran=No
homecity=Hiroshima
locations
57,71,1
endlocations
@ENDIF

@IF
ReceivedTechnology
receiver=IJN
technology=95
@THEN
CreateUnit
owner=IJN
unit=Destroyer
veteran=No
homecity=Hiroshima
locations
57,71,1
endlocations
@ENDIF

@IF
ReceivedTechnology
receiver=IJN
technology=96
@THEN
CreateUnit
owner=IJN
unit=Destroyer
veteran=No
homecity=Hiroshima
locations
57,71,1
endlocations
@ENDIF

@IF
ReceivedTechnology
receiver=IJN
technology=97
@THEN
CreateUnit
owner=IJN
unit=Destroyer
veteran=No
homecity=Hiroshima
locations
57,71,1
endlocations
@ENDIF

@IF
ReceivedTechnology
receiver=IJN
technology=94
@THEN
ChangeMoney
receiver=IJN
amount=-180
TakeTechnology
whom=IJN
technology=94
@ENDIF

@IF
ReceivedTechnology
receiver=IJN
technology=95
@THEN
ChangeMoney
receiver=IJN
amount=-180
TakeTechnology
whom=IJN
technology=95
@ENDIF

@IF
ReceivedTechnology
receiver=IJN
technology=96
@THEN
ChangeMoney
receiver=IJN
amount=-180
TakeTechnology
whom=IJN
technology=96
@ENDIF

@IF
ReceivedTechnology
receiver=IJN
technology=97
@THEN
ChangeMoney
receiver=IJN
amount=-180
TakeTechnology
whom=IJN
technology=97
@ENDIF

;------------------------------------------------------------
; Historical Events
;
; The following events help carve history through China
;
;------------------------------------------------------------

@IF
ScenarioLoaded
@THEN
JustOnce
Text
^------------------------- Briefing -------------------------
endtext
@ENDIF

@IF
ScenarioLoaded 
@THEN
JustOnce
Text
^ With fuel supplies continually dwindling, intelligence has
come up with a temporary solution for our problems in China.
^
^During their operations in the north, the Communists hid large
quantities of fuel in hidden storage facilties near Mukden.
endtext
@ENDIF

@IF
ScenarioLoaded 
@THEN
JustOnce
Text
^ High command does not know exactly where these supplies lay, but
only that they are very large in nature.  We should jump on this
opportunity to relieve our fuel situation in China.
endtext
CreateUnit
owner=Chinese
unit=Fuel Depot
veteran=No
homecity=None
Randomize
locations
66,30,1
66,36,1
64,36,1
endlocations
@ENDIF

@IF
UnitKilled
unit=Fuel Depot
Map=1
attacker=Anybody
defender=Anybody
@THEN
JustOnce
Text
^ High Command congratulates you on finding the depot.  Inside
we have discovered a massive quantity of fuel that will keep
our war effort in China going.  A new fuel depot has been opened
in Tsinan, and transfer of the fuel is underway.
endtext
@ENDIF

@IF
UnitKilled
unit=Fuel Depot
Map=1
attacker=Anybody
defender=Anybody
@THEN
JustOnce
Text
^ Just after the last fuel truck left the depot, the Chinese
Communists sprung a surprise attack in the area!  No doubt they
have used this opportunity to send our forces into disarray.  They
must be stopped immediately.
endtext
CreateUnit
owner=Chinese
unit=Guerillas
Count=2
veteran=No
homecity=None
Randomize
locations
67,27,1
64,32,1
endlocations
@ENDIF

@IF
UnitKilled
unit=Fuel Depot
Map=1
attacker=Anybody
defender=Anybody
@THEN
JustOnce
CreateUnit
owner=Chinese
unit=Guerillas
Count=2
veteran=No
homecity=None
Randomize
locations
58,34,1
68,26,1
endlocations
@ENDIF

@IF
UnitKilled
unit=Fuel Depot
Map=1
attacker=Anybody
defender=Anybody
@THEN
JustOnce
CreateUnit
owner=Chinese
unit=Guerillas
Count=2
veteran=No
homecity=None
Randomize
locations
64,34,1
62,34,1
endlocations
@ENDIF

@IF
UnitKilled
unit=Fuel Depot
Map=1
attacker=Anybody
defender=Anybody
@THEN
JustOnce
CreateUnit
owner=Chinese
unit=Guerillas
veteran=No
homecity=None
Randomize
locations
67,31,1
endlocations
@ENDIF

@IF
UnitKilled
unit=Fuel Depot
Map=1
attacker=Anybody
defender=Anybody
@THEN
JustOnce
CreateUnit
owner=Chinese
unit=Artillery
veteran=No
homecity=None
Randomize
locations
67,31,1
endlocations
@ENDIF

;-------------------------------
;
; Wonder Effects
;
;-------------------------------

; Conscriptor randomizer

@IF
RandomTurn
denominator=12
@AND
Turn
turn=37
@THEN
Flag
who=IJN
state=On
flag=0
@ENDIF

; Naval Conscriptor
@IF
CityProduction
builder=IJN
improvement=44
@THEN
GiveTechnology
technology=33
receiver=IJN
@ENDIF

@IF
ReceivedTechnology
technology=33
receiver=IJN
@AND
CheckFlag
who=IJN
flag=0
State=On
@THEN
CreateUnit
owner=IJN
unit=Marines
Count=2
veteran=No
homecity=Hiroshima
locations
57,71,1
endlocations
Text
^The IJN has conscripted 2 Extra Marines this season!
endtext
@ENDIF

@IF
ReceivedTechnology
technology=33
receiver=IJN
@AND
Turn
turn=37
@THEN
CreateUnit
owner=IJN
unit=Marines
veteran=No
homecity=Hiroshima
locations
57,71,1
endlocations
@ENDIF

; Army Conscriptor
@IF
CityProduction
builder=IJA
improvement=66
@THEN
GiveTechnology
technology=33
receiver=IJA
@ENDIF

@IF
ReceivedTechnology
technology=33
receiver=IJA
@AND
CheckFlag
who=IJN
flag=0
State=On
@THEN
CreateUnit
owner=IJA
unit=Nipponese
Count=2
veteran=No
homecity=None
locations
78,80,1
endlocations
Text
^The army reports recruitments are up! Two more
^Infantry units were recruited this month.
endtext
@ENDIF

@IF
ReceivedTechnology
technology=33
receiver=IJA
@AND
Turn
turn=37
@THEN
CreateUnit
owner=IJA
unit=Nipponese
Count=2
veteran=No
homecity=None
locations
78,80,1
endlocations
@ENDIF

;-------------------------------
;
; Historical Events
;
;-------------------------------

@IF
Turn
turn=34
@THEN
Text
^^------------ The War in Europe -------------
^ The Germans report that they have completely
overrun the defenses of Denmark and Norway.
Though some defenders remain in hiding, the
Germans have boasted that they should have
all of Norway under their fold by summer.
^^--------------------------------------------
endtext
@ENDIF

@IF
Turn
turn=35
@THEN
Text
^^----------- The War in Europe ----------
^ The Germans have informed us that they
have entered the low countries and have
crushed the Dutch in four days.  Belgium
is not expected to last much longer.
^^----------------------------------------
endtext
@ENDIF

@IF
Turn
turn=36
@THEN
Text
^^----------- The War in Europe ------------
^ After penetrating the Maginot Line and
Belgian-Holland defenses last month, the
Germans have excitedly reported to us that
France has fallen.  German troops entered
the city of Paris on June 14.
^^------------------------------------------
endtext
@ENDIF

@IF
Turn
turn=36
@THEN
Text
^ In other news, our diplomats have concluded a
military cooperation treaty with Thailand.  They
have agreed to begin cooperating fully with our
military by the end of the year.
endtext
@ENDIF

;-------------------------------
;
; Regular Chinese Army Movements
;
;-------------------------------

@IF
Turn
turn=Every
@THEN
CreateUnit
owner=Chinese
unit=Chinese Irregulars
Count=2
veteran=Yes
homecity=None
Randomize
locations
42,22,1
40,26,1
45,25,1
43,33,1
43,29,1
40,20,1
endlocations
@ENDIF

@IF
Turn
turn=Every
@THEN
CreateUnit
owner=Chinese
unit=Chinese Irregulars
Count=2
veteran=Yes
homecity=None
Randomize
locations
43,29,1
43,33,1
45,25,1
40,26,1
42,22,1
40,20,1
endlocations
@ENDIF

@IF
Turn
turn=Every
@THEN
CreateUnit
owner=Chinese
unit=Chinese Irregulars
Count=1
veteran=Yes
homecity=None
Randomize
locations
51,21,1
46,32,1
37,37,1
40,20,1
endlocations
@ENDIF

@IF
Turn
turn=Every
@THEN
CreateUnit
owner=Chinese
unit=Guerillas
Count=4
veteran=Yes
homecity=None
Randomize
locations
30,16,1
34,16,1
29,23,1
endlocations
@ENDIF

@IF
Turn
turn=Every
@THEN
CreateUnit
owner=Chinese
unit=Guerillas
Count=2
veteran=Yes
homecity=None
Randomize
locations
35,15,1
38,16,1
26,18,1
32,20,1
endlocations
@ENDIF

; The next two events control guerillas between Loyang and Wuhan

@IF
Turn
turn=Every
@THEN
CreateUnit
owner=Chinese
unit=Guerillas
Count=2
veteran=Yes
homecity=None
Randomize
locations
18,32,1
21,33,1
17,31,1
19,35,1
16,32,1
19,39,1
endlocations
@ENDIF

@IF
Turn
turn=Every
@THEN
CreateUnit
owner=Chinese
unit=Guerillas
veteran=No
homecity=None
Randomize
locations
18,32,1
21,33,1
17,31,1
19,35,1
16,32,1
19,39,1
endlocations
@ENDIF

@IF
Turn
turn=Every
@THEN
CreateUnit
owner=Chinese
unit=Chinese Regulars
Count=2
veteran=Yes
homecity=None
locations
16,18,1
endlocations
@ENDIF

@IF
RandomTurn
denominator=3
@THEN
CreateUnit
owner=Chinese
unit=BT-7 Light Tank
veteran=Yes
homecity=None
locations
16,18,1
endlocations
@ENDIF

@IF
RandomTurn
denominator=3
@THEN
CreateUnit
owner=Chinese
unit=BT-7 Light Tank
veteran=Yes
homecity=None
locations
16,18,1
endlocations
@ENDIF

@IF
RandomTurn
denominator=2
@THEN
CreateUnit
owner=Chinese
unit=I-16
veteran=Yes
homecity=None
locations
16,18,1
endlocations
@ENDIF

@IF
RandomTurn
denominator=2
@THEN
CreateUnit
owner=Chinese
unit=3.7 in. Flak
veteran=Yes
homecity=None
locations
16,18,1
endlocations
@ENDIF

@IF
UnitKilled
unit=I-16
Map=1
attacker=Anybody
defender=Chinese
@THEN
CreateUnit
owner=Chinese
unit=I-16
veteran=Yes
homecity=None
locations
85,29,0
endlocations
@ENDIF

@IF
Turn
turn=Every
@THEN
CreateUnit
owner=Chinese
unit=Cavalry
veteran=Yes
homecity=None
locations
16,18,1
endlocations
@ENDIF

@IF
RandomTurn
denominator=2
@THEN
CreateUnit
owner=Chinese
unit=Artillery
veteran=Yes
homecity=None
locations
16,18,1
endlocations
@ENDIF

@IF
Turn
turn=Every
@THEN
MoveUnit
unit=AnyUnit
owner=Chinese
Map=1
maprect
15,17,17,17,17,19,15,19
moveto
30,34
numbertomove=All
@ENDIF

@IF
UnitKilled
unit=AnyUnit
attacker=Anybody
defender=Anybody
@THEN
MoveUnit
unit=AnyUnit
owner=Chinese
Map=1
maprect
15,17,17,17,17,19,15,19
moveto
30,34
numbertomove=All
@ENDIF

@IF
Turn
turn=Every
@THEN
MoveUnit
unit=AnyUnit
owner=Chinese
Map=1
maprect
11,33,19,33,19,41,11,41
moveto
41,39
numbertomove=All
@ENDIF

@IF
UnitKilled
unit=AnyUnit
attacker=Anybody
defender=Anybody
@THEN
MoveUnit
unit=AnyUnit
owner=Chinese
Map=1
maprect
11,33,19,33,19,41,11,41
moveto
41,39
numbertomove=All
@ENDIF

@IF
RandomTurn
denominator=3
@THEN
CreateUnit
owner=Chinese
unit=Artillery
veteran=Yes
homecity=None
locations
15,37,1
7,37,1
endlocations
@ENDIF

@IF
Turn
turn=Every
@THEN
CreateUnit
owner=Chinese
unit=Chinese Regulars
Count=2
veteran=Yes
homecity=None
locations
15,37,1
7,37,1
endlocations
@ENDIF

@IF
RandomTurn
denominator=4
@THEN
CreateUnit
owner=Chinese
unit=Cavalry
veteran=Yes
homecity=None
locations
15,37,1
7,37,1
endlocations
@ENDIF

@IF
UnitKilled
unit=Artillery
attacker=Anybody
Defender Only
defender=Chinese
@THEN
CreateUnit
owner=Chinese
unit=Cavalry
veteran=Yes
homecity=None
locations
11,55,1
endlocations
@ENDIF

@IF
UnitKilled
unit=Artillery
attacker=Anybody
defender=Chinese
@THEN
MoveUnit
unit=AnyUnit
owner=Chinese
Map=1
maprect
10,54,12,54,12,56,10,56
moveto
46,22
numbertomove=All
@ENDIF

@IF
UnitKilled
unit=Guerillas
attacker=Anybody
defender=Anybody
@THEN
CreateUnit
owner=Chinese
unit=Machine Gun
veteran=Yes
homecity=None
locations
16,18,1
endlocations
@ENDIF

@IF
UnitKilled
unit=Guerillas
attacker=Anybody
defender=Anybody
@THEN
CreateUnit
owner=Chinese
unit=Chinese Irregulars
veteran=Yes
homecity=None
locations
16,18,1
endlocations
@ENDIF

@IF
UnitKilled
unit=Guerillas
attacker=Anybody
defender=Anybody
@THEN
MoveUnit
unit=AnyUnit
owner=Chinese
Map=1
maprect
15,17,17,17,17,19,15,19
moveto
32,20
numbertomove=All
@ENDIF

@IF
UnitKilled
unit=Guerillas
attacker=Anybody
defender=Anybody
@THEN
MoveUnit
unit=AnyUnit
owner=Chinese
Map=1
maprect
31,19,33,19,33,21,31,21
moveto
25,41
numbertomove=All
@ENDIF

@IF
Turn
turn=Every
@THEN
CreateUnit
owner=Chinese
unit=Chinese Irregulars
Count=2
veteran=Yes
homecity=None
Randomize
locations
3,49,1
2,40,1
5,53,1
7,49,1
7,53,1
3,45,1
4,42,1
1,51,1
endlocations
@ENDIF

@IF
Turn
turn=Every
@THEN
CreateUnit
owner=Chinese
unit=Chinese Irregulars
Count=2
veteran=Yes
homecity=None
Randomize
locations
5,53,1
7,49,1
7,53,1
3,45,1
4,42,1
1,51,1
3,49,1
2,40,1
endlocations
@ENDIF

@IF
Turn
turn=Every
@THEN
CreateUnit
owner=Chinese
unit=Chinese Irregulars
Count=2
veteran=Yes
homecity=None
Randomize
locations
2,40,1
5,53,1
7,49,1
7,53,1
3,45,1
4,42,1
1,51,1
3,49,1
endlocations
@ENDIF

@IF
Turn
turn=every
@THEN
MoveUnit
unit=AnyUnit
owner=Chinese
Map=1
maprect
0,40,10,40,10,54,0,54
moveto
30,48
numbertomove=All
@ENDIF

; The following events control the regular army moving from Changsha

@IF
Turn
turn=every
@THEN
MoveUnit
unit=AnyUnit
owner=Chinese
Map=1
maprect
5,33,9,33,9,39,5,39
moveto
46,22
numbertomove=All
@ENDIF

@IF
UnitKilled
unit=AnyUnit
Map=1
attacker=Anybody
defender=Anybody
@THEN
MoveUnit
unit=AnyUnit
owner=Chinese
Map=1
maprect
5,33,9,33,9,39,5,39
moveto
46,22
numbertomove=All
@ENDIF

;-------------------------------
;
; - Wuhan Surprise
;
;-------------------------------

@IF
CityTaken
city=Wuhan
attacker=Anybody
defender=Chinese
@THEN
GiveTechnology
technology=41
receiver=Chinese
@ENDIF

@IF
CityTaken
city=Wuhan
attacker=Anybody
defender=Chinese
@AND
CheckFlag
who=Chinese
flag=1
State=Off
@THEN
CreateUnit
owner=Chinese
unit=Chinese Irregulars
Count=2
veteran=Yes
homecity=None
Randomize
locations
11,37,1
12,40,1
18,38,1
17,33,1
15,33,1
18,32,1
14,34,1
13,41,1
17,39,1
16,32,1
endlocations
@ENDIF

@IF
CityTaken
city=Wuhan
attacker=Anybody
defender=Chinese
@AND
CheckFlag
who=Chinese
flag=1
State=Off
@THEN
CreateUnit
owner=Chinese
unit=Chinese Irregulars
Count=2
veteran=Yes
homecity=None
Randomize
locations
11,37,1
12,40,1
18,38,1
17,33,1
15,33,1
18,32,1
14,34,1
13,41,1
17,39,1
16,32,1
endlocations
@ENDIF

@IF
CityTaken
city=Wuhan
attacker=Anybody
defender=Chinese
@AND
CheckFlag
who=Chinese
flag=1
State=Off
@THEN
CreateUnit
owner=Chinese
unit=Machine Gun
Count=2
veteran=Yes
homecity=None
Randomize
locations
11,37,1
12,40,1
18,38,1
17,33,1
15,33,1
18,32,1
14,34,1
13,41,1
17,39,1
16,32,1
endlocations
@ENDIF

@IF
CityTaken
city=Wuhan
attacker=Anybody
defender=Chinese
@AND
CheckFlag
who=Chinese
flag=1
State=Off
@THEN
CreateUnit
owner=Chinese
unit=Cavalry
veteran=Yes
homecity=None
Randomize
locations
11,37,1
12,40,1
18,38,1
17,33,1
15,33,1
18,32,1
14,34,1
13,41,1
17,39,1
16,32,1
endlocations
@ENDIF

@IF
CityTaken
city=Wuhan
attacker=Anybody
defender=Chinese
@AND
CheckFlag
who=Chinese
flag=1
State=Off
@THEN
CreateUnit
owner=Chinese
unit=Chinese Regulars
Count=2
veteran=Yes
homecity=None
Randomize
locations
11,37,1
12,40,1
18,38,1
17,33,1
15,33,1
18,32,1
14,34,1
13,41,1
17,39,1
16,32,1
endlocations
@ENDIF

@IF
CityTaken
city=Wuhan
attacker=Anybody
defender=Chinese
@AND
CheckFlag
who=Chinese
flag=1
State=Off
@THEN
CreateUnit
owner=Chinese
unit=Chinese Regulars
Count=2
veteran=Yes
homecity=None
Randomize
locations
11,37,1
12,40,1
18,38,1
17,33,1
15,33,1
18,32,1
14,34,1
13,41,1
17,39,1
16,32,1
endlocations
@ENDIF


;-------------------------------
;
; - Southern Defense Force
;
;-------------------------------


@IF
ReceivedTechnology
receiver=Chinese
technology=40
@AND
RandomTurn
denominator=3
@THEN
CreateUnit
owner=Chinese
unit=Cavalry
Count=2
veteran=No
homecity=None
locations
74,38,0
endlocations
@ENDIF

@IF
ReceivedTechnology
receiver=Chinese
technology=40
@AND
RandomTurn
denominator=2
@THEN
CreateUnit
owner=Chinese
unit=Machine Gun
veteran=Yes
homecity=None
locations
74,38,0
endlocations
@ENDIF

@IF
ReceivedTechnology
receiver=Chinese
technology=40
@THEN
CreateUnit
owner=Chinese
unit=Chinese Regulars
veteran=No
homecity=None
locations
74,38,0
endlocations
@ENDIF

@IF
ReceivedTechnology
receiver=Chinese
technology=40
@THEN
CreateUnit
owner=Chinese
unit=Chinese Regulars
veteran=No
homecity=None
locations
74,36,0
endlocations
@ENDIF

@IF
ReceivedTechnology
receiver=Chinese
technology=40
@THEN
CreateUnit
owner=Chinese
unit=Chinese Regulars
veteran=Yes
homecity=None
locations
85,29,0
endlocations
@ENDIF

@IF
ReceivedTechnology
receiver=Chinese
technology=40
@THEN
MoveUnit
unit=AnyUnit
owner=Chinese
Map=0
maprect
73,37,75,37,75,39,73,39
moveto
86,48
numbertomove=All
@ENDIF

@IF
ReceivedTechnology
receiver=Chinese
technology=40
@AND
RandomTurn
denominator=3
@THEN
CreateUnit
owner=Chinese
unit=Cavalry
veteran=Yes
homecity=None
locations
96,42,0
endlocations
@ENDIF

@IF
ReceivedTechnology
receiver=Chinese
technology=40
@AND
RandomTurn
denominator=2
@THEN
CreateUnit
owner=Chinese
unit=Chinese Regulars
veteran=Yes
homecity=None
locations
96,42,0
endlocations
@ENDIF

@IF
ReceivedTechnology
receiver=Chinese
technology=40
@THEN
MoveUnit
unit=AnyUnit
owner=Chinese
Map=0
maprect
95,41,97,41,97,43,95,43
moveto
71,49
numbertomove=All
@ENDIF

@IF
UnitKilled
unit=Chinese Irregulars
Map=0
attacker=Anybody
defender=Anybody
@THEN
CreateUnit
owner=Chinese
unit=Chinese Irregulars
veteran=Yes
homecity=None
Randomize
locations
76,48,0
92,40,0
80,38,0
78,44,0
91,45,0
94,54,0
83,43,0
endlocations
@ENDIF

@IF
UnitKilled
unit=AnyUnit
Map=0
attacker=Anybody
defender=Anybody
@THEN
MoveUnit
unit=Chinese Irregulars
owner=Chinese
Map=0
maprect
71,39,81,39,81,55,71,55
moveto
71,49
numbertomove=All
@ENDIF

@IF
UnitKilled
unit=AnyUnit
Map=0
attacker=Anybody
defender=Anybody
@THEN
MoveUnit
unit=Chinese Irregulars
owner=Chinese
Map=0
maprect
81,35,97,35,97,61,81,61
moveto
86,48
numbertomove=All
@ENDIF

@IF
ReceivedTechnology
receiver=Chinese
technology=40
@THEN
MoveUnit
unit=Chinese Irregulars
owner=Chinese
Map=0
maprect
71,39,81,39,81,55,71,55
moveto
71,49
numbertomove=All
@ENDIF

@IF
ReceivedTechnology
receiver=Chinese
technology=40
@THEN
MoveUnit
unit=Chinese Irregulars
owner=Chinese
Map=0
maprect
81,35,97,35,97,61,81,61
moveto
86,48
numbertomove=All
@ENDIF

;------------------------------------------------------------
;
; Objective Area
;
; This rewards the player for meeting various objectives.
;
;------------------------------------------------------------

; Expires at end of events file

@IF
BribeUnit
who=IJA
whom=IJN
unittype=78
@THEN
Text
^ The Germans report that they have successfully updated
our armaments industry to produce heavy armored vehicles
in greater numbers.  They report that we will not be able
to deploy tanks until July.
endtext
EnableTechnology
whom=IJA
technology=85
value=0
@ENDIF

@IF
UnitKilled
unit=Fuel Depot
Map=1
attacker=Anybody
defender=Anybody
@THEN
JustOnce
ChangeTerrain
Map=1
terraintype=3
maprect
37,33,37,33,37,33,37,33
@ENDIF

@IF
UnitKilled
unit=Fuel Depot
Map=1
attacker=Anybody
defender=Anybody
@THEN
JustOnce
Flag
Continuous
state=On
flag=1
who=IJA
@ENDIF

;------------------------------------------------------------
;
; File Change Statement
;
; The part of the program where we make the User work for
; their enjoyment :)
;
;------------------------------------------------------------

@IF
Turn
turn=37
@THEN
Text
^ As spring gives way to summer, High Command is looking at
the broader picture and has plans for French Indochina in
the coming months.
endtext
@ENDIF

@IF
Turn
turn=37
@AND
CheckFlag
who=IJA
flag=1
State=On
@THEN
Text
^ However, High Command is highly alarmed by the presence
of such a large quantity of Communists in Manchuria.  They
recommend you start reinforcing the area in case they have
more brothers in arms hiding in the area.
endtext
@ENDIF

@IF
Turn
turn=37
@THEN
Text
^You are ready to play part 10 of Kyokujitsu!
endtext
@ENDIF

@ENDEVENTS